local json__ = require("json");
print(json__, json__.decode)
local wget = require("wget");
local _ENV = require("castl.runtime");
local login,login__inside,error,formatError,getOS,srunPortal,chksum,pwd,info,getChallenge,l,s,xEncode,type,n,enc,requestIt,request,paramEncode,byteToString,urlEncode,url__,host,userAgent,debuging,base64,md5,sha1,__typeof;

byteToString = (function (this, arr)
local st,store,bytesLength,v,one,i,__arr,str;
if (_type(arr) == "string") then
do return arr; end
end

str = "";
__arr = arr;
i = 0;
while (_lt(i,__arr.length)) do
one = __arr[i]:toString(2);
v = one:match(_regexp("^1+?(?=0)",""));
if _bool(((function() if _bool(v) then return (_eq(one.length,8)); else return v; end end)())) then
bytesLength = v[0].length;
store = __arr[i]:toString(2):slice((7 - bytesLength));
st = 1;
while (_lt(st,bytesLength)) do
store = (_add(store,__arr[(_add(st,i))]:toString(2):slice(2)));
st = _inc(st);
end

str = (_add(str,String:fromCharCode(parseInt(_ENV,store,2))));
i = (_addNum2(i,(bytesLength - 1)));
else
str = (_add(str,String:fromCharCode(__arr[i])));
end

i = _inc(i);
end

do return str; end
end);
requestIt = (function (this, path, data, callback)
local req,deCode,deJson;
-- deJson = (function (this, dd)
-- do return dd; end
-- end);
-- deCode = callback;
-- if not _bool(callback) then
-- callback = "deJson";
-- else
-- callback = "deCode";
-- end

data.callback = 'deCode';
if _bool(debuging) then
console:log("path",path,"data",data);
end

path = (_add(path,paramEncode(_ENV,data)));
if _bool(debuging) then
console:log("encoder",path);
end

req = request(_ENV,_obj({
["hostname"] = host,
["port"] = 80,
["path"] = path,
["method"] = "GET",
["headers"] = _obj({
["User-Agent"] = userAgent
})
}),(function (this, res)
if _bool(debuging) then
console:log((_addStr1("code: ",res.statusCode)));
end

res:on("data",(function (this, data)
local text,d;
d = data;
if (_type(data) ~= "string") then
d = byteToString(_ENV,data);
end

if _bool(debuging) then
console:log("got data",d);
end

text = d;
if _bool(debuging) then
console:log("text",text);
end

text = text:slice(7,-1);
console:log("json",text);
local tb = json__.decode(text);
callback(_ENV,tb);

end));
end));
(function() local _this = req; local _f = _this["end"]; return _f(_this); end)();
end);
xEncode = (function (this, str, key)
local d,q,p,e,m,c,y,z,n,k,v;
if (_eq(str,"")) then
do return ""; end
end

v = s(_ENV,str,true);
k = s(_ENV,key,false);
if (_lt(k.length,4)) then
k.length = 4;
end

n = (v.length - 1);
z = v[n];
y = v[0];
c = (_bor(2248228889,406206880));
q = Math:floor((6 + (52 / (_addNum2(n,1)))));
d = 0;
while (0<(function () local _tmp = q; q = _dec(_tmp); return _tmp; end)()) do
d = (_band((_add(d,c)),(_bor(2363546047,1931421248))));
e = (_band((_rshift(d,2)),3));
p = 0;
while (_lt(p,n)) do
y = v[(_addNum2(p,1))];
m = (_bxor((_rshift(z,5)),(_lshift(y,2))));
m = (_addNum2(m,(_bxor((_bxor((_rshift(y,3)),(_lshift(z,4)))),(_bxor(d,y))))));
m = (_addNum2(m,(_bxor(k[(_bxor((_band(p,3)),e))],z))));
z = (function() local _cp = p;v[_cp] = (_band((_add(v[p],m)),(_bor(4021866800,273100495)))); return v[_cp] end)();
p = _inc(p);
end

y = v[0];
m = (_bxor((_rshift(z,5)),(_lshift(y,2))));
m = (_addNum2(m,(_bxor((_bxor((_rshift(y,3)),(_lshift(z,4)))),(_bxor(d,y))))));
m = (_addNum2(m,(_bxor(k[(_bxor((_band(p,3)),e))],z))));
z = (function() local _cp = n;v[_cp] = (_band((_add(v[n],m)),(_bor(3141076802,1153890493)))); return v[_cp] end)();
::_continue::
end

do return l(_ENV,v,false); end
end);
s = (function (this, a, b)
local i,v,c;
c = a.length;
v = _arr({},0);
i = 0;
while (_lt(i,c)) do
v[(_arshift(i,2))] = (_bor((_bor((_bor(a:charCodeAt(i),(_lshift(a:charCodeAt((_addNum2(i,1))),8)))),(_lshift(a:charCodeAt((_addNum2(i,2))),16)))),(_lshift(a:charCodeAt((_addNum2(i,3))),24))));
i = (_addNum2(i,4));
end

if _bool(b) then
v[v.length] = c;
end

do return v; end
end);
l = (function (this, a, b)
local i,m,c,d;
d = a.length;
c = (_lshift((d - 1),2));
if _bool(b) then
m = a[(d - 1)];
if ((function() local _lev=(_lt(m,(c - 3))); return _bool(_lev) and _lev or (_gt(m,c)) end)()) then
do return null; end
end

c = m;
end

i = 0;
while (_lt(i,d)) do
a[i] = String:fromCharCode((_band(a[i],255)),(_band((_rshift(a[i],8)),255)),(_band((_rshift(a[i],16)),255)),(_band((_rshift(a[i],24)),255)));
i = _inc(i);
end

if _bool(b) then
do return a:join(""):substring(0,c); end
else
do return a:join(""); end
end

end);
getChallenge = (function (this, url, data, callback)
requestIt(_ENV,"/cgi-bin/get_challenge",data,callback);
end);
json = (function (this, d)
do return JSON:stringify(d); end
end);
info = (function (this, d, k)
do return (_addStr1("{SRBX1}",base64:encode(xEncode(_ENV,json(_ENV,d),k)))); end
end);
pwd = (function (this, d, k)
do return md5(_ENV,d,k); end
end);
chksum = (function (this, d)
do return sha1(_ENV,d); end
end);
srunPortal = (function (this, url, data, callback)
requestIt(_ENV,"/cgi-bin/srun_portal",data,callback);
end);
formatError = (function (this, error)
  console:warn(error);
  do return "Error"; end
end);
error = (function (this, code, error, msg)
if ((function() local _lev=(_eq(_type(code),"number")); return _bool(_lev) and _lev or (_eq(code,"")) end)()) then
if ((function() local _lev=(not _eq(_type(msg),"undefined")); if _bool(_lev) then return (not _eq(msg,"")); else return _lev; end end)()) then
do return formatError(_ENV,msg); end
end

do return formatError(_ENV,error); end
end

if (_eq(code,"E2901")) then
do return msg; end
end

do return code; end
end);
login__inside = (function (this, url, data, callback)
local params,challengeCallback,username;
username = (_add(data.username,((function() local _lev=data.domain; return _bool(_lev) and _lev or "" end)())));
challengeCallback = (function (this, response)
local authCallback,params,os,chkstr,hmd5,i,token,message;
if (not _eq(response.error,"ok")) then
message = error(_ENV,response.ecode,response.error);
do return callback(_ENV,_obj({
["error"] = "fail",
["message"] = message
})); end
end

token = response.challenge;
i = info(_ENV,_obj({
["username"] = username,
["password"] = data.password,
["ip"] = ((function() local _lev=data.ip; return _bool(_lev) and _lev or response["client_ip"] end)()),
["acid"] = data["ac_id"],
["enc_ver"] = enc
}),token);
hmd5 = pwd(_ENV,data.password,token);
chkstr = (_add(token,username));
chkstr = (_add(chkstr,(_add(token,hmd5))));
chkstr = (_add(chkstr,(_add(token,data["ac_id"]))));
chkstr = (_add(chkstr,(_add(token,((function() local _lev=data.ip; return _bool(_lev) and _lev or response["client_ip"] end)())))));
chkstr = (_add(chkstr,(_add(token,n))));
chkstr = (_add(chkstr,(_add(token,type))));
chkstr = (_add(chkstr,(_add(token,i))));
os = getOS(_ENV);
if _bool(data.otp) then
data.password = (_addStr1("{OTP}",data.password));
else
data.password = (_addStr1("{MD5}",hmd5));
end

params = _obj({
["action"] = "login",
["username"] = username,
["password"] = data.password,
["ac_id"] = data["ac_id"],
["ip"] = ((function() local _lev=data.ip; return _bool(_lev) and _lev or response["client_ip"] end)()),
["chksum"] = chksum(_ENV,chkstr),
["info"] = i,
["n"] = n,
["type"] = type,
["os"] = os.device,
["name"] = os.platform,
["double_stack"] = data["double_stack"]
});
authCallback = (function (this, resp)
local message,ploy__msg;
if (_eq(resp.error,"ok")) then
ploy__msg = "";
if (resp["ploy_msg"] ~= undefined) then
ploy__msg = resp["ploy_msg"];
if (_eq(ploy__msg:indexOf("E0000"),0)) then
ploy__msg = "";
end

end

do return callback(_ENV,_obj({
["error"] = "ok",
["message"] = ploy__msg
})); end
end

message = error(_ENV,resp.ecode,resp.error,resp["error_msg"]);
if (not _eq(_type(resp["ploy_msg"]),"undefined")) then
message = resp["ploy_msg"];
end

do return callback(_ENV,_obj({
["error"] = "fail",
["message"] = message
})); end
end);
srunPortal(_ENV,url,params,authCallback);
end);
params = _obj({
["username"] = username,
["ip"] = ((function() local _lev=data.ip; return _bool(_lev) and _lev or "" end)())
});
getChallenge(_ENV,url,params,challengeCallback);
end);
login = (function (this, username__, password__)
getChallenge(_ENV,url__,_obj({
["username"] = username__
}),(function (this, resp)
local params;
params = _obj({
["username"] = username__,
["domain"] = "",
["password"] = password__,
["ac_id"] = 1,
["ip"] = resp["client_ip"],
["double_stack"] = 0
});
login__inside(_ENV,url__,params,(function (this, data)
if _bool(((function() local _lev=(data.error == "ok"); return _bool(_lev) and _lev end)())) then
print("login ok")
else
console:error(data);
end

end));
end));
end);
__typeof = (function() if ((function() local _lev=(_type(Symbol) == "function"); if _bool(_lev) then return (_type(Symbol.iterator) == "symbol"); else return _lev; end end)()) then return (function (this, obj)
do return _type(obj); end
end); else return (function (this, obj)
do return (function() if _bool(((function() local _lev=((function() local _lev=((function() if _bool(obj) then return (_type(Symbol) == "function"); else return obj; end end)()); if _bool(_lev) then return (obj.constructor == Symbol); else return _lev; end end)()); if _bool(_lev) then return (obj ~= Symbol.prototype); else return _lev; end end)())) then return "symbol"; else return _type(obj); end end)(); end
end); end end)();
sha1 = (function (this)
local p,c,u,f,a,n,o,r,s,h,t;
t = (function (this, t)
_seq({(function() if _bool(t) then return _seq({(function() f[0] = (function() f[16] = (function() f[1] = (function() f[2] = (function() f[3] = (function() f[4] = (function() f[5] = (function() f[6] = (function() f[7] = (function() f[8] = (function() f[9] = (function() f[10] = (function() f[11] = (function() f[12] = (function() f[13] = (function() f[14] = (function() f[15] = 0; return f[15] end)(); return f[14] end)(); return f[13] end)(); return f[12] end)(); return f[11] end)(); return f[10] end)(); return f[9] end)(); return f[8] end)(); return f[7] end)(); return f[6] end)(); return f[5] end)(); return f[4] end)(); return f[3] end)(); return f[2] end)(); return f[1] end)(); return f[16] end)(); return f[0] end)(),(function() this.blocks = f; return this.blocks end)()}); else return (function() this.blocks = _arr({[0]=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0},17); return this.blocks end)(); end end)(),(function() this.h0 = 1732584193; return this.h0 end)(),(function() this.h1 = 4023233417; return this.h1 end)(),(function() this.h2 = 2562383102; return this.h2 end)(),(function() this.h3 = 271733878; return this.h3 end)(),(function() this.h4 = 3285377520; return this.h4 end)(),(function() this.block = (function() this.start = (function() this.bytes = (function() this.hBytes = 0; return this.hBytes end)(); return this.bytes end)(); return this.start end)(); return this.block end)(),(function() this.finalized = (function() this.hashed = not _bool(1); return this.hashed end)(); return this.finalized end)(),(function() this.first = not _bool(0); return this.first end)()});
end);h = (function() if (_eq("object",(function() if (_type(window) == "undefined") then return "undefined"; else return __typeof(_ENV,window); end end)())) then return window; else return _obj({}); end end)();
s = ((function() local _lev=((function() local _lev=((function() local _lev=not _bool(h["JS_SHA1_NO_NODE_JS"]); if _bool(_lev) then return (_eq("object",(function() if (_type(process) == "undefined") then return "undefined"; else return __typeof(_ENV,process); end end)())); else return _lev; end end)()); if _bool(_lev) then return process.versions; else return _lev; end end)()); if _bool(_lev) then return process.versions.node; else return _lev; end end)());
_e(((function() if _bool(s) then return (function() h = global; return h end)(); else return s; end end)()));
r = ("0123456789abcdef"):split("");
o = _arr({[0]=-2147483648,8388608,32768,128},4);
n = _arr({[0]=24,16,8,0},4);
a = _arr({[0]="hex","array","digest","arrayBuffer"},4);
f = _arr({},0);
u = (function (this, h)
do return (function (this, s)
do return (function() local _this = _new(t,not _bool(0)):update(s); local _f = _this[h]; return _f(_this); end)(); end
end); end
end);
c = (function (this)
local e,i,h;
h = u(_ENV,"hex");
_seq({((function() if _bool(s) then return (function() h = p(_ENV,h); return h end)(); else return s; end end)()),(function() h.create = (function (this)
do return _new(t); end
end); return h.create end)(),(function() h.update = (function (this, t)
do return h:create():update(t); end
end); return h.update end)()});
i = 0;
while (_lt(i,a.length)) do
e = a[i];
h[e] = u(_ENV,e);
i = _inc(i);
end

do return h; end
end);
p = (function (this, t)
local h;
h = require(_ENV,"sha1");
do return (function (this, i)
do return h:sha1(i); end
end); end
end);
_seq({(function() t.prototype.update = (function (this, t)
local a,o,r,e,i,s;
if not _bool(this.finalized) then
s = (not _eq("string",_type(t)));
_e(((function() local _lev=((function() if _bool(s) then return (t.constructor == h.ArrayBuffer); else return s; end end)()); if _bool(_lev) then return (function() t = _new(Uint8Array,t); return t end)(); else return _lev; end end)()));
r = 0;
o = ((function() local _lev=t.length; return _bool(_lev) and _lev or 0 end)());
a = this.blocks;
while (_lt(r,o)) do
if _bool(_seq({((function() local _lev=this.hashed; if _bool(_lev) then return _seq({(function() this.hashed = not _bool(1); return this.hashed end)(),(function() a[0] = this.block; return a[0] end)(),(function() a[16] = (function() a[1] = (function() a[2] = (function() a[3] = (function() a[4] = (function() a[5] = (function() a[6] = (function() a[7] = (function() a[8] = (function() a[9] = (function() a[10] = (function() a[11] = (function() a[12] = (function() a[13] = (function() a[14] = (function() a[15] = 0; return a[15] end)(); return a[14] end)(); return a[13] end)(); return a[12] end)(); return a[11] end)(); return a[10] end)(); return a[9] end)(); return a[8] end)(); return a[7] end)(); return a[6] end)(); return a[5] end)(); return a[4] end)(); return a[3] end)(); return a[2] end)(); return a[1] end)(); return a[16] end)()}); else return _lev; end end)()),s})) then
e = this.start;
while ((function() local _lev=(_lt(r,o)); if _bool(_lev) then return (_lt(e,64)); else return _lev; end end)()) do
do local _cp = (_arshift(e,2)); a[_cp] = (_bor(a[_cp],(_lshift(t[r],n[(_band(3,(function () local _tmp = e; e = _inc(_tmp); return _tmp; end)()))])))) end;
r = _inc(r);
end

else
e = this.start;
while ((function() local _lev=(_lt(r,o)); if _bool(_lev) then return (_lt(e,64)); else return _lev; end end)()) do
_e((function() if (_lt((function() i = t:charCodeAt(r); return i end)(),128)) then return (function() local _cp = (_arshift(e,2));a[_cp] = (_bor(a[_cp],(_lshift(i,n[(_band(3,(function () local _tmp = e; e = _inc(_tmp); return _tmp; end)()))])))); return a[_cp] end)(); else return (function() if (_lt(i,2048)) then return _seq({(function() local _cp = (_arshift(e,2));a[_cp] = (_bor(a[_cp],(_lshift((_bor(192,(_arshift(i,6)))),n[(_band(3,(function () local _tmp = e; e = _inc(_tmp); return _tmp; end)()))])))); return a[_cp] end)(),(function() local _cp = (_arshift(e,2));a[_cp] = (_bor(a[_cp],(_lshift((_bor(128,(_band(63,i)))),n[(_band(3,(function () local _tmp = e; e = _inc(_tmp); return _tmp; end)()))])))); return a[_cp] end)()}); else return (function() if ((function() local _lev=(_lt(i,55296)); return _bool(_lev) and _lev or (_ge(i,57344)) end)()) then return _seq({(function() local _cp = (_arshift(e,2));a[_cp] = (_bor(a[_cp],(_lshift((_bor(224,(_arshift(i,12)))),n[(_band(3,(function () local _tmp = e; e = _inc(_tmp); return _tmp; end)()))])))); return a[_cp] end)(),(function() local _cp = (_arshift(e,2));a[_cp] = (_bor(a[_cp],(_lshift((_bor(128,(_band((_arshift(i,6)),63)))),n[(_band(3,(function () local _tmp = e; e = _inc(_tmp); return _tmp; end)()))])))); return a[_cp] end)(),(function() local _cp = (_arshift(e,2));a[_cp] = (_bor(a[_cp],(_lshift((_bor(128,(_band(63,i)))),n[(_band(3,(function () local _tmp = e; e = _inc(_tmp); return _tmp; end)()))])))); return a[_cp] end)()}); else return _seq({(function() i = (65536 + (_bor((_lshift((_band(1023,i)),10)),(_band(1023,t:charCodeAt((function () local _tmp = _inc(r); r = _tmp; return _tmp; end)())))))); return i end)(),(function() local _cp = (_arshift(e,2));a[_cp] = (_bor(a[_cp],(_lshift((_bor(240,(_arshift(i,18)))),n[(_band(3,(function () local _tmp = e; e = _inc(_tmp); return _tmp; end)()))])))); return a[_cp] end)(),(function() local _cp = (_arshift(e,2));a[_cp] = (_bor(a[_cp],(_lshift((_bor(128,(_band((_arshift(i,12)),63)))),n[(_band(3,(function () local _tmp = e; e = _inc(_tmp); return _tmp; end)()))])))); return a[_cp] end)(),(function() local _cp = (_arshift(e,2));a[_cp] = (_bor(a[_cp],(_lshift((_bor(128,(_band((_arshift(i,6)),63)))),n[(_band(3,(function () local _tmp = e; e = _inc(_tmp); return _tmp; end)()))])))); return a[_cp] end)(),(function() local _cp = (_arshift(e,2));a[_cp] = (_bor(a[_cp],(_lshift((_bor(128,(_band(63,i)))),n[(_band(3,(function () local _tmp = e; e = _inc(_tmp); return _tmp; end)()))])))); return a[_cp] end)()}); end end)(); end end)(); end end)());
r = _inc(r);
end

end

_seq({(function() this.lastByteIndex = e; return this.lastByteIndex end)(),(function() this.bytes = (_addNum2(this.bytes,(e - this.start))); return this.bytes end)(),(function() if (_ge(e,64)) then return _seq({(function() this.block = a[16]; return this.block end)(),(function() this.start = (e - 64); return this.start end)(),this:hash(),(function() this.hashed = not _bool(0); return this.hashed end)()}); else return (function() this.start = e; return this.start end)(); end end)()});
end

do return _seq({((function() local _lev=(_gt(this.bytes,4294967295)); if _bool(_lev) then return _seq({(function() this.hBytes = (_addNum2(this.hBytes,(_lshift((this.bytes / 4294967296),0)))); return this.hBytes end)(),(function() this.bytes = (_mod(this.bytes,4294967296)); return this.bytes end)()}); else return _lev; end end)()),this}); end
end

end); return t.prototype.update end)(),(function() t.prototype.finalize = (function (this)
local h,t;
if not _bool(this.finalized) then
this.finalized = not _bool(0);
t = this.blocks;
h = this.lastByteIndex;
_seq({(function() t[16] = this.block; return t[16] end)(),(function() local _cp = (_arshift(h,2));t[_cp] = (_bor(t[_cp],o[(_band(3,h))])); return t[_cp] end)(),(function() this.block = t[16]; return this.block end)(),((function() local _lev=(_ge(h,56)); if _bool(_lev) then return _seq({((function() local _lev=this.hashed; return _bool(_lev) and _lev or this:hash() end)()),(function() t[0] = this.block; return t[0] end)(),(function() t[16] = (function() t[1] = (function() t[2] = (function() t[3] = (function() t[4] = (function() t[5] = (function() t[6] = (function() t[7] = (function() t[8] = (function() t[9] = (function() t[10] = (function() t[11] = (function() t[12] = (function() t[13] = (function() t[14] = (function() t[15] = 0; return t[15] end)(); return t[14] end)(); return t[13] end)(); return t[12] end)(); return t[11] end)(); return t[10] end)(); return t[9] end)(); return t[8] end)(); return t[7] end)(); return t[6] end)(); return t[5] end)(); return t[4] end)(); return t[3] end)(); return t[2] end)(); return t[1] end)(); return t[16] end)()}); else return _lev; end end)()),(function() t[14] = (_bor((_lshift(this.hBytes,3)),(_rshift(this.bytes,29)))); return t[14] end)(),(function() t[15] = (_lshift(this.bytes,3)); return t[15] end)(),this:hash()});
end

end); return t.prototype.finalize end)(),(function() t.prototype.hash = (function (this)
local n,o,r,e,i,s,h,t;
s = this.h0;
i = this.h1;
e = this.h2;
r = this.h3;
o = this.h4;
n = this.blocks;
t = 16;
while (_lt(t,80)) do
_seq({(function() h = (_bxor((_bxor((_bxor(n[(t - 3)],n[(t - 8)])),n[(t - 14)])),n[(t - 16)])); return h end)(),(function() local _cp = t;n[_cp] = (_bor((_lshift(h,1)),(_rshift(h,31)))); return n[_cp] end)()});
t = _inc(t);
end

t = 0;
while (_lt(t,20)) do
_seq({(function() s = (_lshift((_add((_addNum2((_addNum1(((function() h = (_bor((_lshift((function() i = (_lshift((_add((_addNum2((_addNum1(((function() h = (_bor((_lshift((function() e = (_lshift((_add((_addNum2((_addNum1(((function() h = (_bor((_lshift((function() r = (_lshift((_add((_addNum2((_addNum1(((function() h = (_bor((_lshift((function() o = (_lshift((_add((_addNum2((_addNum1(((function() h = (_bor((_lshift(s,5)),(_rshift(s,27)))); return h end)() + (_bor((_band(i,e)),(_band(_bnot(i),r))))),o)),1518500249)),n[t])),0)); return o end)(),5)),(_rshift(o,27)))); return h end)() + (_bor((_band(s,(function() i = (_bor((_lshift(i,30)),(_rshift(i,2)))); return i end)())),(_band(_bnot(s),e))))),r)),1518500249)),n[(_addNum2(t,1))])),0)); return r end)(),5)),(_rshift(r,27)))); return h end)() + (_bor((_band(o,(function() s = (_bor((_lshift(s,30)),(_rshift(s,2)))); return s end)())),(_band(_bnot(o),i))))),e)),1518500249)),n[(_addNum2(t,2))])),0)); return e end)(),5)),(_rshift(e,27)))); return h end)() + (_bor((_band(r,(function() o = (_bor((_lshift(o,30)),(_rshift(o,2)))); return o end)())),(_band(_bnot(r),s))))),i)),1518500249)),n[(_addNum2(t,3))])),0)); return i end)(),5)),(_rshift(i,27)))); return h end)() + (_bor((_band(e,(function() r = (_bor((_lshift(r,30)),(_rshift(r,2)))); return r end)())),(_band(_bnot(e),o))))),s)),1518500249)),n[(_addNum2(t,4))])),0)); return s end)(),(function() e = (_bor((_lshift(e,30)),(_rshift(e,2)))); return e end)()});
t = (_addNum2(t,5));
end

while (_lt(t,40)) do
_seq({(function() s = (_lshift((_add((_addNum2((_addNum1(((function() h = (_bor((_lshift((function() i = (_lshift((_add((_addNum2((_addNum1(((function() h = (_bor((_lshift((function() e = (_lshift((_add((_addNum2((_addNum1(((function() h = (_bor((_lshift((function() r = (_lshift((_add((_addNum2((_addNum1(((function() h = (_bor((_lshift((function() o = (_lshift((_add((_addNum2((_addNum1(((function() h = (_bor((_lshift(s,5)),(_rshift(s,27)))); return h end)() + (_bxor((_bxor(i,e)),r))),o)),1859775393)),n[t])),0)); return o end)(),5)),(_rshift(o,27)))); return h end)() + (_bxor((_bxor(s,(function() i = (_bor((_lshift(i,30)),(_rshift(i,2)))); return i end)())),e))),r)),1859775393)),n[(_addNum2(t,1))])),0)); return r end)(),5)),(_rshift(r,27)))); return h end)() + (_bxor((_bxor(o,(function() s = (_bor((_lshift(s,30)),(_rshift(s,2)))); return s end)())),i))),e)),1859775393)),n[(_addNum2(t,2))])),0)); return e end)(),5)),(_rshift(e,27)))); return h end)() + (_bxor((_bxor(r,(function() o = (_bor((_lshift(o,30)),(_rshift(o,2)))); return o end)())),s))),i)),1859775393)),n[(_addNum2(t,3))])),0)); return i end)(),5)),(_rshift(i,27)))); return h end)() + (_bxor((_bxor(e,(function() r = (_bor((_lshift(r,30)),(_rshift(r,2)))); return r end)())),o))),s)),1859775393)),n[(_addNum2(t,4))])),0)); return s end)(),(function() e = (_bor((_lshift(e,30)),(_rshift(e,2)))); return e end)()});
t = (_addNum2(t,5));
end

while (_lt(t,60)) do
_seq({(function() s = (_lshift((_addNum1(((_addNum1(((function() h = (_bor((_lshift((function() i = (_lshift((_addNum1(((_addNum1(((function() h = (_bor((_lshift((function() e = (_lshift((_addNum1(((_addNum1(((function() h = (_bor((_lshift((function() r = (_lshift((_addNum1(((_addNum1(((function() h = (_bor((_lshift((function() o = (_lshift((_addNum1(((_addNum1(((function() h = (_bor((_lshift(s,5)),(_rshift(s,27)))); return h end)() + (_bor((_bor((_band(i,e)),(_band(i,r)))),(_band(e,r))))),o)) - 1894007588),n[t])),0)); return o end)(),5)),(_rshift(o,27)))); return h end)() + (_bor((_bor((_band(s,(function() i = (_bor((_lshift(i,30)),(_rshift(i,2)))); return i end)())),(_band(s,e)))),(_band(i,e))))),r)) - 1894007588),n[(_addNum2(t,1))])),0)); return r end)(),5)),(_rshift(r,27)))); return h end)() + (_bor((_bor((_band(o,(function() s = (_bor((_lshift(s,30)),(_rshift(s,2)))); return s end)())),(_band(o,i)))),(_band(s,i))))),e)) - 1894007588),n[(_addNum2(t,2))])),0)); return e end)(),5)),(_rshift(e,27)))); return h end)() + (_bor((_bor((_band(r,(function() o = (_bor((_lshift(o,30)),(_rshift(o,2)))); return o end)())),(_band(r,s)))),(_band(o,s))))),i)) - 1894007588),n[(_addNum2(t,3))])),0)); return i end)(),5)),(_rshift(i,27)))); return h end)() + (_bor((_bor((_band(e,(function() r = (_bor((_lshift(r,30)),(_rshift(r,2)))); return r end)())),(_band(e,o)))),(_band(r,o))))),s)) - 1894007588),n[(_addNum2(t,4))])),0)); return s end)(),(function() e = (_bor((_lshift(e,30)),(_rshift(e,2)))); return e end)()});
t = (_addNum2(t,5));
end

while (_lt(t,80)) do
_seq({(function() s = (_lshift((_addNum1(((_addNum1(((function() h = (_bor((_lshift((function() i = (_lshift((_addNum1(((_addNum1(((function() h = (_bor((_lshift((function() e = (_lshift((_addNum1(((_addNum1(((function() h = (_bor((_lshift((function() r = (_lshift((_addNum1(((_addNum1(((function() h = (_bor((_lshift((function() o = (_lshift((_addNum1(((_addNum1(((function() h = (_bor((_lshift(s,5)),(_rshift(s,27)))); return h end)() + (_bxor((_bxor(i,e)),r))),o)) - 899497514),n[t])),0)); return o end)(),5)),(_rshift(o,27)))); return h end)() + (_bxor((_bxor(s,(function() i = (_bor((_lshift(i,30)),(_rshift(i,2)))); return i end)())),e))),r)) - 899497514),n[(_addNum2(t,1))])),0)); return r end)(),5)),(_rshift(r,27)))); return h end)() + (_bxor((_bxor(o,(function() s = (_bor((_lshift(s,30)),(_rshift(s,2)))); return s end)())),i))),e)) - 899497514),n[(_addNum2(t,2))])),0)); return e end)(),5)),(_rshift(e,27)))); return h end)() + (_bxor((_bxor(r,(function() o = (_bor((_lshift(o,30)),(_rshift(o,2)))); return o end)())),s))),i)) - 899497514),n[(_addNum2(t,3))])),0)); return i end)(),5)),(_rshift(i,27)))); return h end)() + (_bxor((_bxor(e,(function() r = (_bor((_lshift(r,30)),(_rshift(r,2)))); return r end)())),o))),s)) - 899497514),n[(_addNum2(t,4))])),0)); return s end)(),(function() e = (_bor((_lshift(e,30)),(_rshift(e,2)))); return e end)()});
t = (_addNum2(t,5));
end

_seq({(function() this.h0 = (_lshift((_add(this.h0,s)),0)); return this.h0 end)(),(function() this.h1 = (_lshift((_add(this.h1,i)),0)); return this.h1 end)(),(function() this.h2 = (_lshift((_add(this.h2,e)),0)); return this.h2 end)(),(function() this.h3 = (_lshift((_add(this.h3,r)),0)); return this.h3 end)(),(function() this.h4 = (_lshift((_add(this.h4,o)),0)); return this.h4 end)()});
end); return t.prototype.hash end)(),(function() t.prototype.hex = (function (this)
local e,i,s,h,t;
this:finalize();
t = this.h0;
h = this.h1;
s = this.h2;
i = this.h3;
e = this.h4;
do return (_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add((_add(r[(_band((_arshift(t,28)),15))],r[(_band((_arshift(t,24)),15))])),r[(_band((_arshift(t,20)),15))])),r[(_band((_arshift(t,16)),15))])),r[(_band((_arshift(t,12)),15))])),r[(_band((_arshift(t,8)),15))])),r[(_band((_arshift(t,4)),15))])),r[(_band(15,t))])),r[(_band((_arshift(h,28)),15))])),r[(_band((_arshift(h,24)),15))])),r[(_band((_arshift(h,20)),15))])),r[(_band((_arshift(h,16)),15))])),r[(_band((_arshift(h,12)),15))])),r[(_band((_arshift(h,8)),15))])),r[(_band((_arshift(h,4)),15))])),r[(_band(15,h))])),r[(_band((_arshift(s,28)),15))])),r[(_band((_arshift(s,24)),15))])),r[(_band((_arshift(s,20)),15))])),r[(_band((_arshift(s,16)),15))])),r[(_band((_arshift(s,12)),15))])),r[(_band((_arshift(s,8)),15))])),r[(_band((_arshift(s,4)),15))])),r[(_band(15,s))])),r[(_band((_arshift(i,28)),15))])),r[(_band((_arshift(i,24)),15))])),r[(_band((_arshift(i,20)),15))])),r[(_band((_arshift(i,16)),15))])),r[(_band((_arshift(i,12)),15))])),r[(_band((_arshift(i,8)),15))])),r[(_band((_arshift(i,4)),15))])),r[(_band(15,i))])),r[(_band((_arshift(e,28)),15))])),r[(_band((_arshift(e,24)),15))])),r[(_band((_arshift(e,20)),15))])),r[(_band((_arshift(e,16)),15))])),r[(_band((_arshift(e,12)),15))])),r[(_band((_arshift(e,8)),15))])),r[(_band((_arshift(e,4)),15))])),r[(_band(15,e))])); end
end); return t.prototype.hex end)(),(function() t.prototype.toString = t.prototype.hex; return t.prototype.toString end)(),(function() t.prototype.digest = (function (this)
local e,i,s,h,t;
this:finalize();
t = this.h0;
h = this.h1;
s = this.h2;
i = this.h3;
e = this.h4;
do return _arr({[0]=(_band((_arshift(t,24)),255)),(_band((_arshift(t,16)),255)),(_band((_arshift(t,8)),255)),(_band(255,t)),(_band((_arshift(h,24)),255)),(_band((_arshift(h,16)),255)),(_band((_arshift(h,8)),255)),(_band(255,h)),(_band((_arshift(s,24)),255)),(_band((_arshift(s,16)),255)),(_band((_arshift(s,8)),255)),(_band(255,s)),(_band((_arshift(i,24)),255)),(_band((_arshift(i,16)),255)),(_band((_arshift(i,8)),255)),(_band(255,i)),(_band((_arshift(e,24)),255)),(_band((_arshift(e,16)),255)),(_band((_arshift(e,8)),255)),(_band(255,e))},20); end
end); return t.prototype.digest end)(),(function() t.prototype.array = t.prototype.digest; return t.prototype.array end)(),(function() t.prototype.arrayBuffer = (function (this)
local h,t;
this:finalize();
t = _new(ArrayBuffer,20);
h = _new(DataView,t);
do return _seq({h:setUint32(0,this.h0),h:setUint32(4,this.h1),h:setUint32(8,this.h2),h:setUint32(12,this.h3),h:setUint32(16,this.h4),t}); end
end); return t.prototype.arrayBuffer end)()});
do return c(_ENV); end
end)(_ENV);
md5 = (function (this, n)
local A,C,s,p,m,v,g,l,h,d,a,i,f,c,u,o,e,r,t;
t = (function (this, n, t)
local r;
r = ((_band(65535,n)) + (_band(65535,t)));
do return (_bor((_lshift((((_arshift(n,16)) + (_arshift(t,16))) + (_arshift(r,16))),16)),(_band(65535,r)))); end
end);
r = (function (this, n, t)
do return (_bor((_lshift(n,t)),(_rshift(n,(32 - t))))); end
end);
e = (function (this, n, e, o, u, c, f)
do return t(_ENV,r(_ENV,t(_ENV,t(_ENV,e,n),t(_ENV,u,f)),c),o); end
end);
o = (function (this, n, t, r, o, u, c, f)
do return e(_ENV,(_bor((_band(t,r)),(_band(_bnot(t),o)))),n,t,u,c,f); end
end);
u = (function (this, n, t, r, o, u, c, f)
do return e(_ENV,(_bor((_band(t,o)),(_band(r,_bnot(o))))),n,t,u,c,f); end
end);
c = (function (this, n, t, r, o, u, c, f)
do return e(_ENV,(_bxor((_bxor(t,r)),o)),n,t,u,c,f); end
end);
f = (function (this, n, t, r, o, u, c, f)
do return e(_ENV,(_bxor(r,(_bor(t,_bnot(o))))),n,t,u,c,f); end
end);
i = (function (this, n, r)
local m,v,g,l,h,d,a,i,e;
_seq({(function() local _cp = (_arshift(r,5));n[_cp] = (_bor(n[_cp],(_lshift(128,(_mod(r,32)))))); return n[_cp] end)(),(function() local _cp = (14 + (_lshift((_rshift((_addNum2(r,64)),9)),4)));n[_cp] = r; return n[_cp] end)()});
l = 1732584193;
g = -271733879;
v = -1732584194;
m = 271733878;
e = 0;
while (_lt(e,n.length)) do
_seq({(function() i = l; return i end)(),(function() a = g; return a end)(),(function() d = v; return d end)(),(function() h = m; return h end)(),(function() g = f(_ENV,(function() g = f(_ENV,(function() g = f(_ENV,(function() g = f(_ENV,(function() g = c(_ENV,(function() g = c(_ENV,(function() g = c(_ENV,(function() g = c(_ENV,(function() g = u(_ENV,(function() g = u(_ENV,(function() g = u(_ENV,(function() g = u(_ENV,(function() g = o(_ENV,(function() g = o(_ENV,(function() g = o(_ENV,(function() g = o(_ENV,g,(function() v = o(_ENV,v,(function() m = o(_ENV,m,(function() l = o(_ENV,l,g,v,m,n[e],7,-680876936); return l end)(),g,v,n[(_addNum2(e,1))],12,-389564586); return m end)(),l,g,n[(_addNum2(e,2))],17,606105819); return v end)(),m,l,n[(_addNum2(e,3))],22,-1044525330); return g end)(),(function() v = o(_ENV,v,(function() m = o(_ENV,m,(function() l = o(_ENV,l,g,v,m,n[(_addNum2(e,4))],7,-176418897); return l end)(),g,v,n[(_addNum2(e,5))],12,1200080426); return m end)(),l,g,n[(_addNum2(e,6))],17,-1473231341); return v end)(),m,l,n[(_addNum2(e,7))],22,-45705983); return g end)(),(function() v = o(_ENV,v,(function() m = o(_ENV,m,(function() l = o(_ENV,l,g,v,m,n[(_addNum2(e,8))],7,1770035416); return l end)(),g,v,n[(_addNum2(e,9))],12,-1958414417); return m end)(),l,g,n[(_addNum2(e,10))],17,-42063); return v end)(),m,l,n[(_addNum2(e,11))],22,-1990404162); return g end)(),(function() v = o(_ENV,v,(function() m = o(_ENV,m,(function() l = o(_ENV,l,g,v,m,n[(_addNum2(e,12))],7,1804603682); return l end)(),g,v,n[(_addNum2(e,13))],12,-40341101); return m end)(),l,g,n[(_addNum2(e,14))],17,-1502002290); return v end)(),m,l,n[(_addNum2(e,15))],22,1236535329); return g end)(),(function() v = u(_ENV,v,(function() m = u(_ENV,m,(function() l = u(_ENV,l,g,v,m,n[(_addNum2(e,1))],5,-165796510); return l end)(),g,v,n[(_addNum2(e,6))],9,-1069501632); return m end)(),l,g,n[(_addNum2(e,11))],14,643717713); return v end)(),m,l,n[e],20,-373897302); return g end)(),(function() v = u(_ENV,v,(function() m = u(_ENV,m,(function() l = u(_ENV,l,g,v,m,n[(_addNum2(e,5))],5,-701558691); return l end)(),g,v,n[(_addNum2(e,10))],9,38016083); return m end)(),l,g,n[(_addNum2(e,15))],14,-660478335); return v end)(),m,l,n[(_addNum2(e,4))],20,-405537848); return g end)(),(function() v = u(_ENV,v,(function() m = u(_ENV,m,(function() l = u(_ENV,l,g,v,m,n[(_addNum2(e,9))],5,568446438); return l end)(),g,v,n[(_addNum2(e,14))],9,-1019803690); return m end)(),l,g,n[(_addNum2(e,3))],14,-187363961); return v end)(),m,l,n[(_addNum2(e,8))],20,1163531501); return g end)(),(function() v = u(_ENV,v,(function() m = u(_ENV,m,(function() l = u(_ENV,l,g,v,m,n[(_addNum2(e,13))],5,-1444681467); return l end)(),g,v,n[(_addNum2(e,2))],9,-51403784); return m end)(),l,g,n[(_addNum2(e,7))],14,1735328473); return v end)(),m,l,n[(_addNum2(e,12))],20,-1926607734); return g end)(),(function() v = c(_ENV,v,(function() m = c(_ENV,m,(function() l = c(_ENV,l,g,v,m,n[(_addNum2(e,5))],4,-378558); return l end)(),g,v,n[(_addNum2(e,8))],11,-2022574463); return m end)(),l,g,n[(_addNum2(e,11))],16,1839030562); return v end)(),m,l,n[(_addNum2(e,14))],23,-35309556); return g end)(),(function() v = c(_ENV,v,(function() m = c(_ENV,m,(function() l = c(_ENV,l,g,v,m,n[(_addNum2(e,1))],4,-1530992060); return l end)(),g,v,n[(_addNum2(e,4))],11,1272893353); return m end)(),l,g,n[(_addNum2(e,7))],16,-155497632); return v end)(),m,l,n[(_addNum2(e,10))],23,-1094730640); return g end)(),(function() v = c(_ENV,v,(function() m = c(_ENV,m,(function() l = c(_ENV,l,g,v,m,n[(_addNum2(e,13))],4,681279174); return l end)(),g,v,n[e],11,-358537222); return m end)(),l,g,n[(_addNum2(e,3))],16,-722521979); return v end)(),m,l,n[(_addNum2(e,6))],23,76029189); return g end)(),(function() v = c(_ENV,v,(function() m = c(_ENV,m,(function() l = c(_ENV,l,g,v,m,n[(_addNum2(e,9))],4,-640364487); return l end)(),g,v,n[(_addNum2(e,12))],11,-421815835); return m end)(),l,g,n[(_addNum2(e,15))],16,530742520); return v end)(),m,l,n[(_addNum2(e,2))],23,-995338651); return g end)(),(function() v = f(_ENV,v,(function() m = f(_ENV,m,(function() l = f(_ENV,l,g,v,m,n[e],6,-198630844); return l end)(),g,v,n[(_addNum2(e,7))],10,1126891415); return m end)(),l,g,n[(_addNum2(e,14))],15,-1416354905); return v end)(),m,l,n[(_addNum2(e,5))],21,-57434055); return g end)(),(function() v = f(_ENV,v,(function() m = f(_ENV,m,(function() l = f(_ENV,l,g,v,m,n[(_addNum2(e,12))],6,1700485571); return l end)(),g,v,n[(_addNum2(e,3))],10,-1894986606); return m end)(),l,g,n[(_addNum2(e,10))],15,-1051523); return v end)(),m,l,n[(_addNum2(e,1))],21,-2054922799); return g end)(),(function() v = f(_ENV,v,(function() m = f(_ENV,m,(function() l = f(_ENV,l,g,v,m,n[(_addNum2(e,8))],6,1873313359); return l end)(),g,v,n[(_addNum2(e,15))],10,-30611744); return m end)(),l,g,n[(_addNum2(e,6))],15,-1560198380); return v end)(),m,l,n[(_addNum2(e,13))],21,1309151649); return g end)(),(function() v = f(_ENV,v,(function() m = f(_ENV,m,(function() l = f(_ENV,l,g,v,m,n[(_addNum2(e,4))],6,-145523070); return l end)(),g,v,n[(_addNum2(e,11))],10,-1120210379); return m end)(),l,g,n[(_addNum2(e,2))],15,718787259); return v end)(),m,l,n[(_addNum2(e,9))],21,-343485551); return g end)(),(function() l = t(_ENV,l,i); return l end)(),(function() g = t(_ENV,g,a); return g end)(),(function() v = t(_ENV,v,d); return v end)(),(function() m = t(_ENV,m,h); return m end)()});
e = (_addNum2(e,16));
end

do return _arr({[0]=l,g,v,m},4); end
end);
a = (function (this, n)
local e,r,t;
r = "";
e = (32 * n.length);
t = 0;
while (_lt(t,e)) do
r = (_add(r,String:fromCharCode((_band((_rshift(n[(_arshift(t,5))],(_mod(t,32)))),255)))));
t = (_addNum2(t,8));
end

do return r; end
end);
d = (function (this, n)
local e,r,t;
r = _arr({},0);
_seq({(function() local _cp = ((_arshift(n.length,2)) - 1);r[_cp] = _void(0); return r[_cp] end)(),(function() t = 0; return t end)()});
while (_lt(t,r.length)) do
r[t] = 0;
t = (_addNum2(t,1));
end

e = (8 * n.length);
t = 0;
while (_lt(t,e)) do
do local _cp = (_arshift(t,5)); r[_cp] = (_bor(r[_cp],(_lshift((_band(255,n:charCodeAt((t / 8)))),(_mod(t,32)))))) end;
t = (_addNum2(t,8));
end

do return r; end
end);
h = (function (this, n)
do return a(_ENV,i(_ENV,d(_ENV,n),(8 * n.length))); end
end);
l = (function (this, n, t)
local c,u,o,e,r;
o = d(_ENV,n);
u = _arr({},0);
c = _arr({},0);
_seq({(function() u[15] = (function() c[15] = _void(0); return c[15] end)(); return u[15] end)(),((function() local _lev=(_gt(o.length,16)); if _bool(_lev) then return (function() o = i(_ENV,o,(8 * n.length)); return o end)(); else return _lev; end end)()),(function() r = 0; return r end)()});
while (_lt(r,16)) do
_seq({(function() local _cp = r;u[_cp] = (_bxor(909522486,o[r])); return u[_cp] end)(),(function() local _cp = r;c[_cp] = (_bxor(1549556828,o[r])); return c[_cp] end)()});
r = (_addNum2(r,1));
end

do return _seq({(function() e = i(_ENV,u:concat(d(_ENV,t)),(512 + (8 * t.length))); return e end)(),a(_ENV,i(_ENV,c:concat(e),640))}); end
end);
g = (function (this, n)
local e,r,t;
e = "";
r = 0;
while (_lt(r,n.length)) do
_seq({(function() t = n:charCodeAt(r); return t end)(),(function() e = (_add(e,(_add(("0123456789abcdef"):charAt((_band((_rshift(t,4)),15))),("0123456789abcdef"):charAt((_band(15,t))))))); return e end)()});
r = (_addNum2(r,1));
end

do return e; end
end);
v = (function (this, n)
do return encodeURIComponent(_ENV,n); end
end);
m = (function (this, n)
do return h(_ENV,v(_ENV,n)); end
end);
p = (function (this, n)
do return g(_ENV,m(_ENV,n)); end
end);
s = (function (this, n, t)
do return l(_ENV,v(_ENV,n),v(_ENV,t)); end
end);
C = (function (this, n, t)
do return g(_ENV,s(_ENV,n,t)); end
end);
A = (function (this, n, t, r)
do return (function() if _bool(t) then return (function() if _bool(r) then return s(_ENV,t,n); else return C(_ENV,t,n); end end)(); else return (function() if _bool(r) then return m(_ENV,n); else return p(_ENV,n); end end)(); end end)(); end
end);do return A; end
end)(_ENV,undefined);
base64 = (function (this)
local __encode,__getbyte,__decode,__setAlpha,__getbyte64,__VERSION,__ALPHA,__PADCHAR;
__getbyte64 = (function (this, s, i)
local idx;
idx = __ALPHA:indexOf(s:charAt(i));
if (idx == -1) then
_throw("Cannot decode base64",0)
end

do return idx; end
end);
__setAlpha = (function (this, s)
__ALPHA = s;
end);
__decode = (function (this, s)
local x,imax,b10,i,pads;
pads = 0;
imax = s.length;
x = _arr({},0);
s = String(_ENV,s);
if (imax == 0) then
do return s; end
end

if ((_mod(imax,4)) ~= 0) then
_throw("Cannot decode base64",0)
end

if (s:charAt((imax - 1)) == __PADCHAR) then
pads = 1;
if (s:charAt((imax - 2)) == __PADCHAR) then
pads = 2;
end

imax = (imax - 4);
end

i = 0;
while (_lt(i,imax)) do
b10 = (_bor((_bor((_bor((_lshift(__getbyte64(_ENV,s,i),18)),(_lshift(__getbyte64(_ENV,s,(_addNum2(i,1))),12)))),(_lshift(__getbyte64(_ENV,s,(_addNum2(i,2))),6)))),__getbyte64(_ENV,s,(_addNum2(i,3)))));
x:push(String:fromCharCode((_arshift(b10,16)),(_band((_arshift(b10,8)),255)),(_band(b10,255))));
i = (_addNum2(i,4));
end

repeat
local _into = false;
local _cases = {[1] = true,[2] = true};
local _v = pads;
if not _cases[_v] then
_into = true;
goto _default
end
if _into or (_v == 1) then
b10 = (_bor((_bor((_lshift(__getbyte64(_ENV,s,i),18)),(_lshift(__getbyte64(_ENV,s,(_addNum2(i,1))),12)))),(_lshift(__getbyte64(_ENV,s,(_addNum2(i,2))),6))));
x:push(String:fromCharCode((_arshift(b10,16)),(_band((_arshift(b10,8)),255))));
break;
_into = true;
end
if _into or (_v == 2) then
b10 = (_bor((_lshift(__getbyte64(_ENV,s,i),18)),(_lshift(__getbyte64(_ENV,s,(_addNum2(i,1))),12))));
x:push(String:fromCharCode((_arshift(b10,16))));
break;
_into = true;
end
::_default::
until true
do return x:join(""); end
end);
__getbyte = (function (this, s, i)
local x;
x = s:charCodeAt(i);
if (_gt(x,255)) then
_throw("INVALID_CHARACTER_ERR: DOM Exception 5",0)
end

do return x; end
end);
__encode = (function (...)
local this, s = ...;
local arguments = _args(...);
local imax,x,b10,i;
if (arguments.length ~= 1) then
_throw("SyntaxError: exactly one argument required",0)
end

s = String(_ENV,s);
x = _arr({},0);
imax = (s.length - (_mod(s.length,3)));
if (s.length == 0) then
do return s; end
end

i = 0;
while (_lt(i,imax)) do
b10 = (_bor((_bor((_lshift(__getbyte(_ENV,s,i),16)),(_lshift(__getbyte(_ENV,s,(_addNum2(i,1))),8)))),__getbyte(_ENV,s,(_addNum2(i,2)))));
x:push(__ALPHA:charAt((_arshift(b10,18))));
x:push(__ALPHA:charAt((_band((_arshift(b10,12)),63))));
x:push(__ALPHA:charAt((_band((_arshift(b10,6)),63))));
x:push(__ALPHA:charAt((_band(b10,63))));
i = (_addNum2(i,3));
end

repeat
local _into = false;
local _cases = {[1] = true,[2] = true};
local _v = (s.length - imax);
if not _cases[_v] then
_into = true;
goto _default
end
if _into or (_v == 1) then
b10 = (_lshift(__getbyte(_ENV,s,i),16));
x:push((_add((_add((_add(__ALPHA:charAt((_arshift(b10,18))),__ALPHA:charAt((_band((_arshift(b10,12)),63))))),__PADCHAR)),__PADCHAR)));
break;
_into = true;
end
if _into or (_v == 2) then
b10 = (_bor((_lshift(__getbyte(_ENV,s,i),16)),(_lshift(__getbyte(_ENV,s,(_addNum2(i,1))),8))));
x:push((_add((_add((_add(__ALPHA:charAt((_arshift(b10,18))),__ALPHA:charAt((_band((_arshift(b10,12)),63))))),__ALPHA:charAt((_band((_arshift(b10,6)),63))))),__PADCHAR)));
break;
_into = true;
end
::_default::
until true
do return x:join(""); end
end);__PADCHAR = "=";
__ALPHA = "LVoJPiCN2R8G90yg+hmFHuacZ1OWMnrsSTXkYpUq/3dlbfKwv6xztjI7DeBE45QA";
__VERSION = "1.0";
do return _obj({
["decode"] = __decode,
["encode"] = __encode,
["setAlpha"] = __setAlpha,
["VERSION"] = __VERSION
}); end
end)(_ENV);
debuging = true;
userAgent = "Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:88.0) Gecko/20100101 Firefox/88.0";
host = "10.248.98.2";
url__ = (_addStr1("http://",host));
urlEncode = (function (this, url, data)
if not _bool(data) then
do return url; end
end

res = "";
local _p = _props(data, true);
for _,k in _ipairs(_p) do
k = _tostr(k);
res = (_addStr2(res,((_addStr1((_addStr2(k,"=")),encodeURIComponent(_ENV,data[k]))) .. "&")));::_continue::
end

res = res:slice(0,-1);
if (_gt(res.length,0)) then
url = (_addStr2(url,(_addStr1("?",res))));
end

do return url; end
end);
paramEncode = (function (this, data)
res = "";
local _p = _props(data, true);
for _,k in _ipairs(_p) do
k = _tostr(k);
res = (_addStr2(res,((_addStr1((_addStr2(k,"=")),encodeURIComponent(_ENV,data[k]))) .. "&")));::_continue::
end

res = res:slice(0,-1);
if (_gt(res.length,0)) then
res = (_addStr1("?",res));
end

do return res; end
end);
request = (function (this, options, callback)
local content,code;
console:log(options);
code = 200;
content = wget(((_addStr1((_addStr1(((_addStr1(((_addStr1("wget --user-agent=\"",userAgent)) .. "\" -q -O - \"http://"),options.hostname)) .. ":"),options.port)),options.path)) .. "\""));
-- if not _bool(console__file) then
-- code = 404;
-- end

callback(_ENV,_obj({
["statusCode"] = code,
["on"] = (function (this, eventName, resolve)
if (eventName == "data") then
resolve(_ENV,content);
end

end)
}));
end);
enc = (("s" .. "run") .. "_bx1");
n = 200;
type = 1;
getOS = (function (this)
do return _obj({
["device"] = "Windows 10",
["platform"] = "Windows"
}); end
end);
login(_ENV,"200110619","1352040930_____*");
